home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2003 May
/
PCWorld_2003-05_cd.bin
/
Software
/
Komercni
/
dispatcher
/
setup.exe
/
{app}
/
Tisk
/
RZbozi2.hpr
/
RZbozi2.txt
Wrap
Text File
|
2003-01-31
|
23KB
|
858 lines
object RozvZbozi2Rpt_1: TRozvZbozi2Rpt
Left = 233
Top = 139
Width = 741
Height = 583
Caption = 'Kniha j�zd'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Scaled = False
PixelsPerInch = 96
TextHeight = 13
object QuickRep1: TQuickRep
Left = 8
Top = 0
Width = 794
Height = 1123
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
DataSet = ADODataSet1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
Functions.Strings = (
'PAGENUMBER'
'COLUMNNUMBER'
'REPORTTITLE'
'BUSSKM'
'PRIVKM')
Functions.DATA = (
'0'
'0'
#39#39
'0'
'0')
Options = [FirstPageHeader, LastPageFooter]
Page.Columns = 1
Page.Orientation = poPortrait
Page.PaperSize = A4
Page.Values = (
100.000000000000000000
2970.000000000000000000
100.000000000000000000
2100.000000000000000000
100.000000000000000000
100.000000000000000000
0.000000000000000000)
PrinterSettings.Copies = 1
PrinterSettings.Duplex = False
PrinterSettings.FirstPage = 0
PrinterSettings.LastPage = 0
PrinterSettings.OutputBin = Auto
PrintIfEmpty = True
SnapToGrid = True
Units = Native
Zoom = 100
object QRBand1: TQRBand
Left = 38
Top = 38
Width = 718
Height = 71
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
187.854166666666700000
1899.708333333333000000)
BandType = rbTitle
object QRLabel2: TQRLabel
Left = 0
Top = 8
Width = 54
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
0.000000000000000000
21.166666666666700000
142.875000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '[:Firma:]'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRShape1: TQRShape
Left = 0
Top = 27
Width = 716
Height = 3
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
7.937500000000000000
0.000000000000000000
71.437500000000000000
1894.416666666670000000)
Pen.Color = clNavy
Pen.Width = 3
Shape = qrsHorLine
end
object QRLabel1: TQRLabel
Left = 493
Top = 8
Width = 222
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1304.395833333330000000
21.166666666666700000
587.375000000000000000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Pl�n rozvozu se zbo��m - souhrnn�'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText9: TQRDBText
Left = 8
Top = 37
Width = 705
Height = 23
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
60.854166666666700000
21.166666666666700000
97.895833333333300000
1865.312500000000000000)
Alignment = taCenter
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = ADODataSet1
DataField = 'nazev'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 14
end
end
object QRGroup1: TQRGroup
Left = 38
Top = 109
Width = 718
Height = 52
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ForceNewColumn = False
ForceNewPage = False
ParentFont = False
Size.Values = (
137.583333333333300000
1899.708333333333000000)
Expression = 'ADODataSet1.roztrasy.klic'
FooterBand = QRBand3
Master = QuickRep1
ReprintOnNewPage = False
object QRDBText8: TQRDBText
Left = 16
Top = 4
Width = 43
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.916666666666700000
42.333333333333300000
10.583333333333300000
113.770833333333000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = ADODataSet1
DataField = 'name'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 12
end
object QRDBText17: TQRDBText
Left = 168
Top = 6
Width = 34
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
444.500000000000000000
15.875000000000000000
89.958333333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = ADODataSet1
DataField = 'driver'
Transparent = False
WordWrap = True
FontSize = 9
end
object QRDBText10: TQRDBText
Left = 288
Top = 5
Width = 21
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
762.000000000000000000
13.229166666666700000
55.562500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = ADODataSet1
DataField = 'car'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRExpr2: TQRExpr
Left = 440
Top = 5
Width = 125
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.333333333333300000
1164.166666666670000000
13.229166666666700000
330.729166666667000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
ResetAfterPrint = False
Transparent = False
WordWrap = True
Expression = 'ADODataSet1.g / 1000'
FontSize = 9
end
object QRLabel14: TQRLabel
Left = 32
Top = 30
Width = 31
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
84.666666666666700000
79.375000000000000000
82.020833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Zbo��'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
object QRLabel16: TQRLabel
Left = 400
Top = 30
Width = 51
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1058.333333333330000000
79.375000000000000000
134.937500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Mno�stv�'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
object QRLabel17: TQRLabel
Left = 592
Top = 30
Width = 111
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1566.333333333330000000
79.375000000000000000
293.687500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Celk. hmotnost (kg)'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
object QRDBText1: TQRDBText
Left = 678
Top = 6
Width = 30
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.333333333333300000
1793.875000000000000000
15.875000000000000000
79.375000000000000000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = ADODataSet1
DataField = 'nazev'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsItalic]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
end
object QRBand2: TQRBand
Left = 38
Top = 161
Width = 718
Height = 18
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Frame.Style = psDot
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
47.625000000000000000
1899.708333333333000000)
BandType = rbDetail
object QRDBText4: TQRDBText
Left = 32
Top = 1
Width = 25
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
84.666666666666700000
2.645833333333330000
66.145833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = ADODataSet1
DataField = 'text1'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
object QRDBText5: TQRDBText
Left = 400
Top = 1
Width = 49
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1058.333333333330000000
2.645833333333330000
129.645833333333000000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = ADODataSet1
DataField = 'mnozstvi'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
object QRExpr3: TQRExpr
Left = 573
Top = 1
Width = 131
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1516.062500000000000000
2.645833333333330000
346.604166666667000000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
Color = clWhite
ParentFont = False
ResetAfterPrint = False
Transparent = False
WordWrap = True
Expression = 'ADODataSet1.grams/ 1000'
FontSize = 8
end
end
object QRBand3: TQRBand
Left = 38
Top = 179
Width = 718
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
37.041666666666670000
1899.708333333333000000)
BandType = rbGroupFooter
end
object QRBand4: TQRBand
Left = 38
Top = 193
Width = 718
Height = 32
Frame.Color = clBlack
Frame.DrawTop = True
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
84.666666666666670000
1899.708333333333000000)
BandType = rbPageFooter
object QRLabel18: TQRLabel
Left = 0
Top = 8
Width = 260
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
0.000000000000000000
21.166666666666700000
687.916666666667000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Vyti�t�no programem Dispatcher 3, HI Software s.r.o.'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
object QRSysData1: TQRSysData
Left = 616
Top = 8
Width = 105
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1629.833333333330000000
21.166666666666700000
277.812500000000000000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
Color = clWhite
Data = qrsPageNumber
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Text = 'Strana'
Transparent = False
FontSize = 8
end
end
object T2: TQRLabel
Left = 168
Top = 16
Width = 8
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
444.500000000000000000
42.333333333333300000
21.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '0'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object T1: TQRLabel
Left = 128
Top = 16
Width = 8
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
338.666666666667000000
42.333333333333300000
21.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '0'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object T3: TQRLabel
Left = 208
Top = 16
Width = 15
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
550.333333333333000000
42.333333333333300000
39.687500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '26'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object NTS: TQRLabel
Left = 240
Top = 16
Width = 75
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
635.000000000000000000
42.333333333333300000
198.437500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Pl�n rozvozu'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object idVerze: TQRLabel
Left = 336
Top = 16
Width = 8
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
889.000000000000000000
42.333333333333300000
21.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '3'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object Agenda: TQRLabel
Left = 360
Top = 16
Width = 8
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
952.500000000000000000
42.333333333333300000
21.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '4'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
end
object DataSource1: TDataSource
DataSet = ADODataSet1
Left = 24
Top = 16
end
object ADODataSet1: TADODataSet
CursorType = ctStatic
CommandText =
'SELECT rozvoz.klic, rozvoz.nazev, roztrasy.klic, roztrasy.name,' +
' roztrasy.car, roztrasy.mistood, roztrasy.mistodo,roztrasy.drive' +
'r,roztrasy.m, '#13#13#10'roztrasy.time1, roztrasy.timeodjezdu, roztrasy.' +
'g, roztrasy.carg, roztrasy.objem, roztrasy.zdrzeni, fapol.idtras' +
'a,fapol.text1, SUM(fapol.mn) '#13#13#10'AS mnozstvi, SUM(fapol.g) AS gra' +
'ms FROM rozvoz, roztrasy, fapol WHERE (rozvoz.klic = 7) AND (roz' +
'trasy.idrozvoz = rozvoz.klic) AND (fapol.idtrasa = roztrasy.klic' +
') GROUP BY rozvoz.klic, rozvoz.nazev,roztrasy.klic, roztrasy.nam' +
'e, '#13#13#10'roztrasy.car, roztrasy.mistood, roztrasy.mistodo, roztrasy' +
'.driver, roztrasy.m, roztrasy.time1,roztrasy.timeodjezdu,roztras' +
'y.g, roztrasy.carg, '#13#13#10'roztrasy.objem, roztrasy.zdrzeni, fapol.i' +
'dtrasa, fapol.text1 ORDER BY roztrasy.klic, fapol.text1'
Parameters = <>
Left = 64
Top = 16
end
end